home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / diskmags / 3565-4.665 / dmg-4663 / routine1.txt < prev    next >
Text File  |  1998-10-23  |  2KB  |  61 lines

  1.                                            
  2.  
  3.  
  4.     This is an OBJECT CONDITION routine that is used on a button 
  5. on a contol panel to start a countdown sequence ( as used in my
  6. recent game  "War of the worlds" ).This could be used in a game
  7. where a player has started a rocket ignition sequence off.All 
  8. the text is displayed to text instrument number one that is made 
  9. up of two lines ( one above the other ),each line is 14 
  10. spaces/characters long.Sound 7 is a suitable siren/warning sample 
  11. and Sound 8 is a rocket/engine sample.It is important to get the 
  12. blank spaces exact as in this listing so that the numbers in the 
  13. countdown sequence move from right to left as they decrease in 
  14. value. 
  15.      
  16.  
  17. IF ACTIVATED?                              if you touch button
  18. SOUND (7)                                  play sample 7
  19. PRINT ("   IGNITION   \N    STARTED   ",1) print to instr-1
  20. DELAY (150)                                gives chance to read
  21. SOUND (7)                                  play sample again
  22. PRINT ("  COUNTDOWN   \N  COMMENCES   ",1)  and so on-DELAY (150)
  23. SOUND (8)
  24. PRINT ("           5  \N              ",1)
  25. DELAY (50)
  26. PRINT ("         4    ",1)      the number 4 is in the 10th space on
  27. DELAY (50)
  28. PRINT ("       3      ",1)      the number 3 is in the 8th space on
  29. DELAY (50)
  30. PRINT ("     2        ",1)       "    "    2    "    " 6th  "    " 
  31. SOUND (8)
  32. DELAY (50)
  33. PRINT ("   1          ",1)       "    "    1    "    " 4th  "    "
  34. DELAY (50)
  35. PRINT (" ZERO  ",1)
  36. DELAY (70)
  37. PRINT ("    WE HAVE \N  SEPARATION ",1)
  38. SOUND (8)
  39. DELAY (100)
  40. SEQUENCE (1)                            start video sequence
  41. ENDIF
  42.  
  43. I know that it's a long listing but it is the only way
  44. to write and show the listing properly.You  could even cut this 
  45. block of text out and import it straight into kit 2.
  46.  
  47. AND THERES MORE...........
  48.  
  49.  
  50. This is a routine to make a series of circles pulsating inwards 
  51. into the middle of the screen as used if a person has picked up a 
  52. special weapon with pulsating firing sights.It could be used as a 
  53. LOCAL or OBJECT CONDITION.
  54.  
  55. FOR (V30,10,50,10)
  56. CIRCLE (160,100,V30,173)
  57. NEXT
  58.  
  59.  
  60.  
  61.